home *** CD-ROM | disk | FTP | other *** search
-
-
-
- TTTTeeeexxxxtttt::::::::WWWWrrrraaaapppp((((3333)))) TTTTeeeexxxxtttt::::::::WWWWrrrraaaapppp((((3333))))
-
-
-
- NNNNAAAAMMMMEEEE
- Text::Wrap - line wrapping to form simple paragraphs
-
- SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
- use Text::Wrap
-
- print wrap($initial_tab, $subsequent_tab, @text);
- print fill($initial_tab, $subsequent_tab, @text);
-
- use Text::Wrap qw(wrap $columns $huge);
-
- $columns = 132;
- $huge = 'die';
- $huge = 'wrap';
-
-
- DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
- _T_e_x_t::_W_r_a_p::_w_r_a_p() is a very simple paragraph formatter. It formats a
- single paragraph at a time by breaking lines at word boundaries.
- Indentation is controlled for the first line ($initial_tab) and all
- subsequent lines ($subsequent_tab) independently.
-
- Lines are wrapped at $Text::Wrap::columns columns. $Text::Wrap::columns
- should be set to the full width of your output device.
-
- When words that are longer than $columns are encountered, they are broken
- up. Previous versions of _w_r_a_p() _d_i_e()ed instead. To restore the old
- (dying) behavior, set $Text::Wrap::huge to 'die'.
-
- _T_e_x_t::_W_r_a_p::_f_i_l_l() is a simple multi-paragraph formatter. It formats
- each paragraph separately and then joins them together when it's done.
- It will destroy any whitespace in the original text. It breaks text into
- paragraphs by looking for whitespace after a newline. In other respects
- it acts like _w_r_a_p().
-
- EEEEXXXXAAAAMMMMPPPPLLLLEEEE
- print wrap("\t","","This is a bit of text that forms
- a normal book-style paragraph");
-
-
- AAAAUUUUTTTTHHHHOOOORRRR
- David Muir Sharnoff <muir@idiom.com> with help from Tim Pierce and many
- many others.
-
-
-
-
-
-
-
-
-
-
-
-
- PPPPaaaaggggeeee 1111
-
-
-
-